home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / NEW / A-Newest / Quittner.d64 / tpug info-13 < prev    next >
Text File  |  2009-01-03  |  6KB  |  81 lines

  1. ║CM:TPUG-13
  2. ║PT5:CN1:JU0:PG62
  3. ├╧═╨╒╘┼╥ ├╧══╧─╧╥┼ 64 & ├64 ╔╬╞╧╥═┴╘╔╧╬-13:
  4. ║CN0:PT12:╩╒1
  5.  
  6.      ╘HE ├OMMODORE 1541 DISK DRIVE CONTAINS A SMALL COMPUTER, DEDICATED TO DO CERTAIN TASKS. ╘HE DISK DRIVE'S ╥EAD-╧NLY-═EMORY (╥╧═) CONTAINS ABOUT 16000 BYTES, WHILE THE ╥ANDOM-┴CCESS ═EMORY (╥┴═) CONTAINS STORAGE FOR ABOUT 2000 BYTES.
  7.      ─ISKS CAN CONTAIN PROGRAM FILES (╨╥╟), ╙EQUENTIAL FILES (╙┼╤), ╒SER FILES (╒╙╥) AND ╥ELATIVE FILES (╥┼╠). ┴LSO ╥ANDOM FILES ARE AVAILABLE.        
  8.      ┴LL DISKS CONTAIN A DIRECTORY THAT CAN BE LOADED (LOAD "$",8) AND THEN LISTED, SHOWING THE LENGTH OF EACH ITEM, ITS NAME AND ALSO ITS TYPE. ╘HE MOST OFTEN TYPE USED ARE PROGRAM (╨╥╟) FILES. ╘O READ THEIR CONTENTS SIMPLY LOAD THE PROGRAM AND THEN TYPE LIST OR L╔ (LOWER CASE EL AND UPPER CASE ╔) FOLLOWED BY PRESSING THE ╥┼╘╒╥╬ KEY.
  9.  
  10.      ╚ERE IS A PROGRAM TO READ ╙EQUENTIAL (╙┼╤) FILES:
  11.  
  12. 0   REM "╥┼┴─ ╙┼╤ ╞╔╠┼ ┬┘ ╩╧┼ ╤╒╔╘╘╬┼╥
  13. 10  ?C╚(144)├╚(14)
  14. 100 G╧ 8000
  15. 997 :P╧204,0:GETG$:IFG$=""T╚997
  16. 998 :IF P┼(207) T╚998
  17. 999 P╧204,1:RE╘
  18. 4000 :REM"   ╨RINTER. ╨╥╔╬╘┼╥╙ ─╔╞╞┼╥, ╘╚╔╙ ╫╧╥╦╙ ╞╧╥ ╘╚┼ ╧╬┼ ╔ ╒╙┼.
  19. 4010 ?"  ╨RINTER ON? ";:GO╙997:?G$
  20. 4012 P=0:IFG$<>"Y"T╚ RE╘
  21. 4020 P=1
  22. 4021 CL╧5:CL╧7:OPEN5,4,5:OPEN 7,4,7
  23. 4030 F╧I=1 TO 10
  24. 4032 P╥5,C╚(27)C╚(108)C╚(5):REM" ╠EFT MARGIN=5
  25. 4034 P╥5,C╚(27)C╚(81)C╚(77):N┼:REM" ╥IGHT MARGIN=77
  26. 4039 ?"  ╙ET ╔NTERFACE TO ╩UNIOR":RE╘
  27. 8000 :REM" ╥EAD DISK FILE
  28. 8002 GO╙4000:INPUT" ╞╔╠┼╬┴═┼";F$:IF P T╚ P╥7,F$":"
  29. 8010 OPEN8,8,8,"0:"+F$+",S,R
  30. 8012 :GET#8,H$:S=ST:IFP T╚ P╥7,H$;
  31. 8013 ? H$;:IFS=0 T╚8012
  32. 8020 ?:CL╧8:IFPT╚ P╥7
  33. 8021 END
  34.  
  35. ║JU1
  36.      ╘HINK OF THE OLD PHONOGRAPH MUSIC DISKS; THEY HAVE A SINGLE TRACK LIKE A SPIRAL AND THE INFORMATION ON THAT TRACK STARTS ON THE OUTSIDE, WITH THE NEEDLE READING THE MUSIC FROM THERE CONTINUOSLY UNTIL THE END OF THE SPIRAL TRACK IS REACHED NEAR THE CENTRE OF THE DISK.
  37.  
  38.      ╘HE DISKS USED BY THE 64 AND ├64 COMPUTERS HAVE NO SPIRAL TRACK, BUT INSTEAD THERE ARE 35 SELECTABLE TRACKS ON CONCENTRIC CIRCLES ON THE DISK. ┼ACH OF THESE TRACKS IS SUBDIVIDED INTO SELECTABLE BLOCKS, ALSO CALLED SECTORS, EACH CARRYING 256 BYTES, WITH THE OUTSIDE TRACKS 1 TO 17 HAVING 21 BLOCKS/SECTORS EACH, TRACKS 18 TO 24 HAVE 19 EACH, 25 TO 30 HAVE 18 EACH, AND THE NEAR-CENTRE TRACKS 31 TO 35 HAVE 17 EACH ON THEM.
  39.  
  40.      ╘HE BIG ADVANTAGE OF USING DISKS OVER USING TAPES IS THAT ON DISKS ANY BLOCK/SECTOR ON ANY TRACK CAN BE SELECTED, AND EVEN ANY OF THE 256 BYTES ON ANY BLOCK/SECTOR CAN BE POINTED TO, READ, AND WRITTEN INTO BY THE DISK DRIVE.
  41.  
  42.      ╨ROGRAMS (╨╥╟) ARE TAKEN FROM THE DISK BY THE LOAD COMMAND, AND ARE WRITTEN ONTO THE DISK BY THE SAVE COMMAND; LOAD "NAME",8 FOR EXAMPLE WILL TAKE THE PROGRAM CALLED NAME FROM THE DISK AND LOAD IT USUALLY INTO MEMORY STARTING AT 2049, WITH A COMPULSORY ZERO IN 2048.
  43.  
  44.      ╘HERE IS AN OPTION TO LOAD THE ╨╥╟ ELSEWHERE BY USING LOAD "NAME",8,1 IF THAT PROGRAM, LOCATED ELSEWHERE IN MEMORY, HAS BEEN SAVED PREVIOUSLY BY THE SAVE "NAME",8,1 COMMAND. ╘HE NUMBER 8 INDICATES A SPECIFIC DISK DRIVE; MORE THAN ONE DISK DRIVES CAN BE IN USE, THEIR DEVICE NUMBERS BEING 8 TO 11.
  45.  
  46.      ╘O CHANGE, FOR EXAMPLE, THE DEVICE NUMBER OF A DISK DRIVE FROM THE USUAL 8 TO 9 USE THIS, OR A SIMILAR, PROGRAM:
  47.  
  48. ║JU0
  49. 10 OPEN 15,8,15:REM" ╘ELLS DRIVE 8 THAT A CHANGE IS COMING
  50. 12 P╥15,"M-W"C╚(119)C╚(0)C╚(2)C╚(9+32)C╚(9+64):REM "─ETAILS OF THE REQUIRED CHANGE.
  51. ║JU1
  52.      ╔NSTEAD OF THIS SOFTWARE CHANGE A HARDWARE CHANGE OF THE DEVICE NUMBER CAN BE MADE TO A DISK DRIVE BY REMOVING ONE OR TWO SPECIFIC LINKS ON THE PRINTED CIRCUIT BOARD INSIDE THE DISK DRIVE.
  53.  
  54.      ╘O OPEN A ╙┼╤ FILE FOR READING, OFTEN CONTAINING THE DATA USED BY A ╨╥╟ FILE, USE, FOR EXAMPLE,
  55. OPEN 2,8,2,"0:NAME,S,R"
  56.       WHERE THE FIRST 2 IS THE OPTIONAL NUMBER SELECTED BY THE USER, THE 8 IS THE DEVICE NUMBER OF THE DISK DRIVE, THE SECOND 2 IS THE NUMBER OF THE SELECTED BUFFER (A PORTION OF THE MEMORY LOCATED INSIDE THE DISK DRIVE), THE 0 INDICATES THAT MORE THAN TWO BUFFERS CAN BE USED, FOLLOWED BY THE NAME OF THE ╙┼╤ FILE. ╘HE S INDICATES THAT IT IS A ╙┼╤ FILE, AND THE R WILL CAUSE READING FROM THAT FILE. ╔NSTEAD OF THE R, W CAN BE USED IF, INSTEAD OF READING FROM, WRITING INTO THAT ╙┼╤ FILE IS TO BE DONE. ╬OTE THAT EACH DISK CAN BE WRITE-PROTECTED BY COVERING THE SLOT ON THE SIDE OF THE DISK, AND IF A FILE NAME EXISTS ALREADY THERE WILL BE A WARNING MESSAGE, FOLLOWED BY A STOP. ╘HESE CAN BE DISABLED BY USING "@0: INSTEAD OF "0: ABOVE.
  57.  
  58.      ╔NSTEAD OF THE S, P WILL REFER TO A ╨╥╟ FILE,  OR U TO A ╒SER (╒╙╥) FILE, MAINLY USED FOR MACHINE LANGUAGE.
  59.  
  60.      ├LOSING THE FILES IS SIMPLE; CLOSE 2 WILL CLOSE FILE 2. ┴FTER COMPLETION OF A SAVING OPERATION, OR OTHERWISE AFTER COMPLETION OF WRITING INTO A DISK, THE FILE ═╒╙╘ BE CLOSED IMMEDIATELY.
  61.  
  62.      ╞OR RANDOM FILES, THE OPEN STATEMENT INCLUDES THE OPTIONAL FILE NUMBER, THE DEVICE NUMBER, THE NUMBER OF THE CHANNEL AND "#" INDICATING TO THE DISK DRIVE THAT ANY BUFFER CAN BE USED BY THE DISK DRIVE. ╞OR EXAMPLE:
  63. OPEN 2,8,2,"#"
  64.  
  65.      ╙EVERAL COMMANDS ARE AVAILABLE FOR RANDOM FILES:
  66.      ╘O READ A BLOCK OF BYTES USE B-R.
  67.      ╘O WRITE INTO A BLOCK OF BYTES USE B-W.
  68.      ╘O FIND (ALLOCATE) A STILL FREE BLOCK AND THEN RESERVE IT USE B-A.
  69.      ╘O FREE (MAKE AVAILABLE) A RESERVED BLOCK FOR A POSSIBLE NEW USE, USE B-F.
  70.      ╘O GET THE POINTER TO MOVE TO A SPECIFIC BYTE INSIDE A BUFFER USE B-P, SO THAT THIS SPECIFIC BYTE CAN THEN BE EITHER READ FROM, OR WRITTEN INTO.
  71.  
  72.      ╘HE USER1 ("U1:"OR"UA:") COMMAND WILL ENABLE THE READING, USING INPUT# OR GET# TO FOLLOW, OF A WHOLE BLOCK, NOT ONLY JUST ONE BYTE AS PER POINTER POSITION.
  73.  
  74.      ╘O READ A WHOLE BLOCK FROM A DISK USE:
  75. PRINT#FILE#,"U1:",CHANNEL;DRIVE;TRACK;BLOCK.
  76.  
  77.      ╞OR WRITING INTO A WHOLE BLOCK, USING PRINT# TO FOLLOW, USE USER2 ("U2:"OR"UB:") INSTEAD.
  78.  
  79. ║PT20:CN1
  80. ┬Y ╩OE ╤UITTNER, ╘╨╒╟, ╩UNE 19, 2008.
  81.